home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
501 Great Games
/
501 Great Games - Volume One (2001)(Guildhall Leisure Services).iso
/
PENCILS1
/
_SETUP.1
/
cdown.exe
/
0
/
RCDATA
/
TFORM1
/
TFORM1.txt
< prev
Wrap
Text File
|
1998-06-30
|
2KB
|
112 lines
object Form1: TForm1
Left = 380
Top = 144
BorderIcons = []
BorderStyle = bsNone
Caption = 'Form1'
ClientHeight = 444
ClientWidth = 637
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
PopupMenu = PopupMenu1
OnClose = FormClose
OnCreate = FormCreate
OnMouseDown = FormMouseDown
OnMouseMove = FormMouseMove
OnMouseUp = FormMouseUp
PixelsPerInch = 96
TextHeight = 13
object Image2: TImage
Left = 0
Top = 0
Width = 640
Height = 480
AutoSize = True
Picture.Data = {<image000.bmp>}
PopupMenu = PopupMenu1
OnMouseDown = FormMouseDown
OnMouseMove = FormMouseMove
OnMouseUp = FormMouseUp
end
object Label1: TLabel
Left = 0
Top = 36
Width = 637
Height = 36
Align = alTop
Alignment = taCenter
Caption = '1 hr, 37 min, 14 sec'
Color = clLime
Font.Color = clLime
Font.Height = -32
Font.Name = 'Mirarae BT'
Font.Style = []
ParentColor = False
ParentFont = False
Transparent = True
OnMouseDown = FormMouseDown
OnMouseMove = FormMouseMove
OnMouseUp = FormMouseUp
end
object Label2: TLabel
Left = 0
Top = 0
Width = 637
Height = 36
Align = alTop
Alignment = taCenter
Caption = 'Event'
Color = clLime
Font.Color = clLime
Font.Height = -32
Font.Name = 'Mirarae BT'
Font.Style = []
ParentColor = False
ParentFont = False
Transparent = True
OnMouseDown = FormMouseDown
OnMouseMove = FormMouseMove
OnMouseUp = FormMouseUp
end
object Timer1: TTimer
Interval = 900
OnTimer = Timer1Timer
Left = 40
Top = 24
end
object PopupMenu1: TPopupMenu
Left = 40
Top = 64
object Options1: TMenuItem
Caption = '&Options'
ShortCut = 113
OnClick = Options1Click
end
object N1: TMenuItem
Caption = '-'
ShortCut = 0
end
object Shrink1: TMenuItem
Caption = '&Shrink'
ShortCut = 116
OnClick = Shrink1Click
end
object Expand1: TMenuItem
Caption = '&Expand'
ShortCut = 119
OnClick = Expand1Click
end
object N2: TMenuItem
Caption = '-'
ShortCut = 0
end
object Exit1: TMenuItem
Caption = '&Close'
ShortCut = 114
OnClick = Exit1Click
end
end
end